home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Frozen Fish 1: Amiga
/
FrozenFish-Apr94.iso
/
bbs
/
alib
/
d5xx
/
d504
/
polysilicon.lha
/
PolySiliCon
/
Install SiliCon
/
.work_scripts
/
fixup_startup
< prev
next >
Wrap
Text File
|
1991-06-27
|
4KB
|
139 lines
failat 25
mat >RAM:__check nocase search "mount IP:" T "^F line ^N: ^O" S:Startup(-Sequence|II)
if not warn
echo "mount request already in Startup-Sequence...:"
type RAM:__check
delete >NIL: RAM:__check
echo "I assume that's OK..."
skip do_sili
endif
delete >NIL: RAM:__check
delete >NIL: RAM:(_New_S_Seq|_New_SII|_temp_S_SEQ)
echo ""
echo "for automatic mounting of IP: at boot-up"
echo "you should have a 'mount IP:' command in your startup sequence"
echo "I can edit it in automatically if you like now."
jask "-rShall I do this?" -q
if not warn
echo "OK... We're all done, then."
skip EXIT_all
endif
mat >NIL: search "S:StartupII" nocase S:Startup-Sequence
if not warn
if not exists S:StartupII
skip mainseq
endif
mat >RAM:_MSII nolines s mount p "mount #?" label "Merge >RAM:_New_SII S:StartupII " t ^N tag ^|0 nocase first S:StartupII label " _WS:IP_Merge^B"
if not warn
echo "Other mounts appear to be in file 'S:StartupII'"
else
echo "The usual place for mounts is 'S:StartupII'"
endif
echo "Unless you think otherwise, I will insert 'mount IP:' there."
jask "-rEdit 'Mount IP:' into StartupII?" -q
if not warn
skip mainseq
endif
if exists S:StartupII.BAK
echo "A previous version of S:StartupII.BAK exists!"
jask "-roverwrite S:StartupII.BAK?" -q
if warn
delete >NIL: S:StartupII.BAK
else
echo "OK -- I'll leave startup files alone"
skip EXIT_all
endif
endif
execute RAM:_MSII
echo "command inserted (with other mounts if poss.) in S:StartupII"
echo "The original will be preserved in S:StartupII.BAK"
copy RAM:_New_SII to S:New_StartupII
if fail
skip editfail
endif
delete >NIL: RAM:_New_SII
cd S:
rename StartupII StartupII.BAK
rename New_StartupII StartupII
cd _I_Install_:
skip do_sili
endif
lab mainseq
echo "I will insert the mount command into your main S:Startup-Sequence..."
mat >RAM:_MSII p "# (mount |LoadWB)#?" t "Merge >RAM:_New_S_Seq S:Startup-Sequence ^N _WS:IP_Merge" nocase first S:Startup-Sequence
if warn
echo "Sorry -- can't decide where to insert it!"
echo "I'm afraid you'll have to edit S:Startup-Sequence yourself."
skip editfail
endif
execute RAM:_MSII
lab do_sili
mat >RAM:__check nocase search "sili" T "^F line ^N: ^O" S:Startup-Sequence
if not warn
echo "Startup-Sequence apparently already loads Sili(CON:):"
type RAM:__check
delete >NIL: RAM:__check
echo "I assume that's OK..."
skip done_ss
endif
delete >NIL: RAM:__check
echo ""
echo "You can start Sili(CON:) at boot up"
echo "with suitable commands in your startup sequence"
echo "I can edit these in automatically if you like now."
jask "-rShall I do this?" -q
if not warn
echo "OK... not putting SiliCon in Startup"
skip done_ss
endif
if exists RAM:_New_S_Seq
copy RAM:_New_S_Seq RAM:_temp_S_Seq
else
copy S:Startup-Sequence RAM:_temp_S_Seq
endif
mat >RAM:_MSII p "# endcli#?" t "Merge >RAM:_New_S_Seq RAM:_temp_S_Seq -^N _WS:Sili_Merge" nocase first RAM:_temp_S_Seq
if warn
echo "Sorry -- can't decide where to insert it!"
echo "I'm afraid you'll have to edit S:Startup-Sequence yourself."
skip done_ss
endif
execute RAM:_MSII
lab done_ss
if exists RAM:_New_S_Seq
copy RAM:_New_S_Seq to S:New_Startup-Sequence
if fail
skip editfail
endif
delete >NIL: RAM:_New_S_Seq
echo "commands inserted in S:Startup-Sequence"
echo "The original will be preserved in S:Startup-Sequence.BAK"
if exists S:Startup-Sequence.BAK
echo "A previous version of S:Startup-Sequence.BAK exists!"
jask "-roverwrite S:Startup-Sequence.BAK?" -q
if warn
delete >NIL: S:Startup-Sequence.BAK
else
echo "OK -- I'll leave Startup-Sequence alone"
echo "The revised file is `S:New_Startup-Sequence'"
skip done
endif
endif
cd S:
rename Startup-Sequence Startup-Sequence.BAK
rename New_Startup-Sequence Startup-Sequence
cd _I_Install_:
endif
skip done
lab editfail
echo "Editing of Startup Sequence FAILED!"
echo " -- original files left undisturbed."
lab done